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ALLOCATE TABLES: 
WHITE_RL[93l 
BLACK_RL[93J 

MR_CONTROL[1 0] 
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FOR l=0 TO 92 
WHITE_RL[I] = BLACK_RL[I] = I 

FOR l = 0 TO 9 
MR_CONTROL[i] = l 
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GET MR CODE ELEMENT & MR CODE ELEMENT TYPE 
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SUPPLY THE FREQUENCY INTERVALS STORED IN THE 
APPROPRIATE TABLE TO ARITHMETIC CODER 90 
OR ARITHMETIC DECODER 110 



UPDATE APPROPRIATE TABLE: 
INCREASE FREQUENCY OF CURRENT CODE ELEMENT 



260 



FOR EACH TYPE t, 
REFRESH_STATISTICAL_TABLES: ^.270 
IF TABLE[NUM_OF_SYMBOLS]=N t 
FOR l=0 TO NUM_OF_SYMBOLS 

TABLE[l]=TABLE[l]/2 

IF TABLE[Q<TABLE[i-l] 

TABLEfi] =TABLE[i - 1 ] + 1 
NEXT I LJ L J 



